home *** CD-ROM | disk | FTP | other *** search
/ Night Owl - The Best of BBS / Night Owl The Best of BBS (NOP-BBS) (Night Owl Publisher) (1994).iso / 014a / ezbbs215.lha / Data / ExtFiles / pack < prev   
AmigaDOS Script File  |  1993-12-25  |  313b  |  19 lines
  1. .KEY directory/A,tofile/A
  2. .BRA {
  3. .KET }
  4.  
  5. ;
  6. ; Calculate size of directory
  7. ; ( DU is included in MB:C )
  8. ;
  9.  
  10. If `MB:C/Du -S "{directory}"` GT 2000 VAL
  11.     ; sorry, too large
  12.     Delete "{tofile}"
  13. Else
  14.     ; okay, let's pack it
  15.     LhA -a -A -b64 -e -P-1 -r -x a "{tofile}" "{directory}"
  16.     ;Rename "{tofile}.lha" "{tofile}"
  17. EndIf
  18.  
  19.